Plots

B-cells

No base effect

grid.arrange(arrangeGrob(plt.res$no_base$plt.meqtl, plt.res$no_base$plt.eqtl, plt.res$no_base$scatter.plt,
    nrow = 1))

With base effect

grid.arrange(arrangeGrob(plt.res$with_base$plt.meqtl, plt.res$with_base$plt.eqtl, plt.res$with_base$scatter.plt,
    nrow = 1))

CD4mem

No base effect

grid.arrange(arrangeGrob(plt.res$no_base$plt.meqtl, plt.res$no_base$plt.eqtl, plt.res$no_base$scatter.plt,
    nrow = 1))

With base effect

grid.arrange(arrangeGrob(plt.res$with_base$plt.meqtl, plt.res$with_base$plt.eqtl, plt.res$with_base$scatter.plt,
    nrow = 1))

CD4nv

No base effect

grid.arrange(arrangeGrob(plt.res$no_base$plt.meqtl, plt.res$no_base$plt.eqtl, plt.res$no_base$scatter.plt,
    nrow = 1))

With base effect

grid.arrange(arrangeGrob(plt.res$with_base$plt.meqtl, plt.res$with_base$plt.eqtl, plt.res$with_base$scatter.plt,
    nrow = 1))

CD8mem

No base effect

grid.arrange(arrangeGrob(plt.res$no_base$plt.meqtl, plt.res$no_base$plt.eqtl, plt.res$no_base$scatter.plt,
    nrow = 1))

With base effect

grid.arrange(arrangeGrob(plt.res$with_base$plt.meqtl, plt.res$with_base$plt.eqtl, plt.res$with_base$scatter.plt,
    nrow = 1))

Neu

No base effect

grid.arrange(arrangeGrob(plt.res$no_base$plt.meqtl, plt.res$no_base$plt.eqtl, plt.res$no_base$scatter.plt,
    nrow = 1))

With base effect

grid.arrange(arrangeGrob(plt.res$with_base$plt.meqtl, plt.res$with_base$plt.eqtl, plt.res$with_base$scatter.plt,
    nrow = 1))